,s50,Please select one or more MIDI songs for playback:
listbox playlist,l51,
button okbutton,b52,TRUE
button cancelbutton,b53,FALSE
,s54,To select multiple MIDI songs, hold CTRL key down while clicking with the left mouse button.
,s55,Hold the Shift key down while clicking with the left mouse button to extend a selection.
,s60,Please select one or more MIDI songs for playback:
dlgBox
524480,7,55,1,176,152,,,MIDIPlay Playlist,8,Helv,,3.73,4.55,171.73,11.45,50,1342177280,130,Please select one or more MIDI songs for playback:,0,playlist,3.73,16.45,166.13,64.33,51,1352730625,131,,0,okbutton,21.60,124.14,50.86,12.31,52,1342242817,128,&OK,0,cancelbutton,98.32,124.14,50.86,12.31,53,1342242816,128,&Cancel,0,,3.73,76.80,164.27,18.09,54,1342177280,130,To select multiple MIDI songs,0,,3.73,100.47,162.59,20.10,55,1342177280,130,Hold the Shift key down while clicking with the left mouse button to extend a selection.,0,,0.30,95.63,176.30,0.98,60,1350565888,130,Please select one or more MIDI songs for playback:,0
ctrlID
videodescription
4nameoffile,filenameval
init
dlgInit
setValue(
,"static midifilename",
--DLL function
retValue
dialog(dlgBox
getValue(
Bokbutton")
viddes")
buttonUp
buttonUp
dlgInit
static midifilename
setValue
dlgBox
dialog
button okbutton
getValue
edit viddes
getValue
cancel
retValue
nameoffile
filenameval
dlgInit
,s50,Please enter a description for this MIDI file.
edit viddes,e51,
button okbutton,b52,TRUE
,s54,MIDI File Name:
static midifilename,s55,
button cancelbutton,b56,FALSE
dlgBox
524480,6,62,12,155,96,,,MIDI Description,8,Helv,,3.54,31.38,147.50,11.45,50,1342177280,130,Please enter a description for this MIDI file.,0,viddes,3.54,43.45,100.80,13.17,51,1350631424,129,,0,okbutton,24.08,65.56,37.33,12.31,52,1342242817,128,OK,0,,3.58,2.71,63.47,11.45,54,1342177280,130,MIDI File Name:,0,midifilename,1.68,15.30,138.17,11.45,55,1342177280,130,,0,cancelbutton,91.31,65.03,37.33,12.31,56,1342242816,128,Cancel,0
,s57,You have entered a description which has already been used. Please re-enter a new description for this MIDI file.
,b58,FALSE
dlgBox
524480,3,55,20,193,73,,,Duplicate Decription,8,Helv,,7.47,16.74,18.29,19.69,56,1342177283,130,stop,0,,35.47,12.72,138.13,28.14,57,1342177280,130,You have entered a description which has already been used. Please re-enter a new description for this MIDI file.
,s50,The following MIDI file(s) could not be located on the path(s) indicated. Either they have been moved to a new location or have been deleted. In order for MIDIPlay to work properly, the MIDI file(s) must be removed from your list of MIDI files. Click on the OK button to do this now. (NOTE: If the MIDI file(s) shown below have simply been moved to a new location, you can add them back to your list.)
button okbutton,b60,TRUE
listbox videolist,l58,
,h112,
dlgBox
524480,4,25,0,237,160,,,MIDIPlay,8,Helv,,27.85,4.59,205.33,59.94,50,1342177280,130,The following MIDI file(s) could not be located on the path(s) indicated. Either they have been moved to a new location or have been deleted. In order for MIDIPlay to work properly,0,okbutton,65.18,131.24,102.67,12.31,60,1342242817,128,OK,0,videolist,27.85,66.91,201.60,59.86,58,1352728577,131,,0,,3.58,18.67,18.29,19.69,112,1342177283,130,stop,0
ctrlID
warning2
4warningtext
init
dlgInit
setValue(
,"static label",
--DLL function
retValue
dialog(dlgBox
getValue(
Byesbutton")
delete
buttonUp
buttonUp
dlgInit
static label
setValue
dlgBox
dialog
button yesbutton
getValue
retValue
warningtext
dlgInit
,h56,
static label,s58,
button yesbutton,b59,TRUE
button nobutton,b76,FALSE
,s91,Are you sure you want to remove:
dlgBox
524480,5,44,18,199,69,,,MIDIPlay,8,Helv,,5.45,9.93,18.29,19.69,56,1342177283,130,question,0,label,33.30,22.36,160.50,10.05,58,1342177280,130,,0,yesbutton,29.68,42.09,50.86,14.03,59,1342242816,128,Yes,0,nobutton,111.85,42.09,50.86,14.07,76,1342242817,128,No,0,,33.30,10.30,134.40,10.05,91,1342177280,130,Are you sure you want to remove:
!ctrlID
playbutton
removeselect
4tempval
"title"
temper
init
dlgInit
setValue(
,"listbox removelist",
--DLL function
retValue
dialog(dlgBox
getValue(
Bokbutton")
buttonUp
buttonUp
title
dlgInit
listbox removelist
setValue
dlgBox
dialog
button okbutton
getValue
listbox removelist
getValue
retValue
temper
tempval
$dlgInit
button okbutton,b61,TRUE
button cancelbutton,b62,FALSE
listbox removelist,l64,
F&N%dlgBox
524480,3,71,13,136,146,,,Select MIDI file to remove...,8,Helv,okbutton,13.07,117.58,50.86,12.31,61,1342242816,128,OK,0,cancelbutton,72.80,117.58,50.86,12.31,62,1342242817,128,Cancel,0,removelist,13.07,11.04,110.13,100.51,64,1352728579,131,,0
V&ctrlID
about
init
dlgInit
setValue(
,"","")
--DLL function
retValue
dialog(dlgBox
getValue(
., "")
tbkmci("status MIDIFile mode","")
= "stopped"
3play
buttonUp
buttonUp
dlgInit
dlgBox
dialog
status MIDIFile mode
tbkmci
stopped
play MIDIFile
tbkmci
retValue
*d(dlgInit
,s105,MIDIPlay Version 1.0
,s106,(C) Copyright 1993
DunsonWare, Co.
All Rights Reserved
,g111,
,g115,
,b116,FALSE
,h123,
,s124,DunsonWare, Co.
P.O. Box 771269
Wichita, KS 67277-1269
,s125,This program may be freely distributed without cost provided that it is in no way changed. MIDIPlay is shareware and if you find it of value please send a $5.00 check or money order payable to DunsonWare to the following address:
-(*dlgBox
524480,8,50,2,181,206,,,About MIDIPlay,8,Helv,,56.00,10.50,80.27,11.45,105,1342177280,130,MIDIPlay Version 1.0
DunsonWare,0,,48.53,4.47,87.73,18.09,111,1342177287,128,,0,,9.33,82.87,162.40,90.46,115,1342177287,128,,0,,63.47,179.36,50.86,12.31,116,1342242816,128,OK,0,,11.20,6.48,18.29,19.69,123,1342177283,130,comment,0,,54.13,145.19,85.87,24.12,124,1342177280,130,DunsonWare,0,,22.40,90.91,145.60,54.28,125,1342177280,130,This program may be freely distributed without cost provided that it is in no way changed. MIDIPlay is shareware and if you find it of value please send a $5.00 check or money order payable to DunsonWare to the following address:,0